/ Revista CD Expert 32 / CD Expert nº 32.iso / Unreal T / utdemo338.exe / System / UBrowser.u / UBrowserServerList_UBrowserNewFavoriteCW_ScriptText.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 67 0d 63 6c 61 73 73 20 |........|g.class |
|00000010| 55 42 72 6f 77 73 65 72 | 4e 65 77 46 61 76 6f 72 |UBrowser|NewFavor|
|00000020| 69 74 65 43 57 20 65 78 | 70 61 6e 64 73 20 55 42 |iteCW ex|pands UB|
|00000030| 72 6f 77 73 65 72 45 64 | 69 74 46 61 76 6f 72 69 |rowserEd|itFavori|
|00000040| 74 65 43 57 3b 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |teCW;...|.functio|
|00000050| 6e 20 4c 6f 61 64 43 75 | 72 72 65 6e 74 56 61 6c |n LoadCu|rrentVal|
|00000060| 75 65 73 28 29 0d 0a 7b | 0d 0a 09 47 61 6d 65 50 |ues()..{|...GameP|
|00000070| 6f 72 74 45 64 69 74 2e | 53 65 74 56 61 6c 75 65 |ortEdit.|SetValue|
|00000080| 28 22 37 37 37 37 22 29 | 3b 0d 0a 09 51 75 65 72 |("7777")|;...Quer|
|00000090| 79 50 6f 72 74 45 64 69 | 74 2e 53 65 74 56 61 6c |yPortEdi|t.SetVal|
|000000a0| 75 65 28 22 37 37 37 38 | 22 29 3b 0d 0a 7d 0d 0a |ue("7778|");..}..|
|000000b0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 4f 4b 50 72 65 |..functi|on OKPre|
|000000c0| 73 73 65 64 28 29 0d 0a | 7b 0d 0a 09 6c 6f 63 61 |ssed()..|{...loca|
|000000d0| 6c 20 55 42 72 6f 77 73 | 65 72 53 65 72 76 65 72 |l UBrows|erServer|
|000000e0| 4c 69 73 74 46 61 63 74 | 6f 72 79 20 46 3b 0d 0a |ListFact|ory F;..|
|000000f0| 09 6c 6f 63 61 6c 20 55 | 42 72 6f 77 73 65 72 53 |.local U|BrowserS|
|00000100| 65 72 76 65 72 4c 69 73 | 74 20 4c 3b 0d 0a 09 6c |erverLis|t L;...l|
|00000110| 6f 63 61 6c 20 55 42 72 | 6f 77 73 65 72 46 61 76 |ocal UBr|owserFav|
|00000120| 6f 72 69 74 65 53 65 72 | 76 65 72 73 20 57 3b 0d |oriteSer|vers W;.|
|00000130| 0a 0d 0a 09 57 20 3d 20 | 55 42 72 6f 77 73 65 72 |....W = |UBrowser|
|00000140| 46 61 76 6f 72 69 74 65 | 53 65 72 76 65 72 73 28 |Favorite|Servers(|
|00000150| 55 42 72 6f 77 73 65 72 | 52 69 67 68 74 43 6c 69 |UBrowser|RightCli|
|00000160| 63 6b 4d 65 6e 75 28 50 | 61 72 65 6e 74 57 69 6e |ckMenu(P|arentWin|
|00000170| 64 6f 77 2e 4f 77 6e 65 | 72 57 69 6e 64 6f 77 29 |dow.Owne|rWindow)|
|00000180| 2e 47 72 69 64 2e 47 65 | 74 50 61 72 65 6e 74 28 |.Grid.Ge|tParent(|
|00000190| 63 6c 61 73 73 27 55 42 | 72 6f 77 73 65 72 46 61 |class'UB|rowserFa|
|000001a0| 76 6f 72 69 74 65 53 65 | 72 76 65 72 73 27 29 29 |voriteSe|rvers'))|
|000001b0| 3b 0d 0a 09 46 20 3d 20 | 57 2e 46 61 63 74 6f 72 |;...F = |W.Factor|
|000001c0| 69 65 73 5b 30 5d 3b 0d | 0a 09 0d 0a 09 4c 20 3d |ies[0];.|.....L =|
|000001d0| 20 55 42 72 6f 77 73 65 | 72 53 65 72 76 65 72 4c | UBrowse|rServerL|
|000001e0| 69 73 74 28 46 2e 50 69 | 6e 67 65 64 4c 69 73 74 |ist(F.Pi|ngedList|
|000001f0| 2e 43 72 65 61 74 65 49 | 74 65 6d 28 46 2e 50 69 |.CreateI|tem(F.Pi|
|00000200| 6e 67 65 64 4c 69 73 74 | 2e 43 6c 61 73 73 29 29 |ngedList|.Class))|
|00000210| 3b 0d 0a 0d 0a 09 4c 2e | 48 6f 73 74 4e 61 6d 65 |;.....L.|HostName|
|00000220| 20 3d 20 44 65 73 63 72 | 69 70 74 69 6f 6e 45 64 | = Descr|iptionEd|
|00000230| 69 74 2e 47 65 74 56 61 | 6c 75 65 28 29 3b 0d 0a |it.GetVa|lue();..|
|00000240| 09 4c 2e 49 50 20 3d 20 | 49 50 45 64 69 74 2e 47 |.L.IP = |IPEdit.G|
|00000250| 65 74 56 61 6c 75 65 28 | 29 3b 0d 0a 09 4c 2e 50 |etValue(|);...L.P|
|00000260| 69 6e 67 20 3d 20 39 39 | 39 39 3b 0d 0a 09 4c 2e |ing = 99|99;...L.|
|00000270| 51 75 65 72 79 50 6f 72 | 74 20 3d 20 49 6e 74 28 |QueryPor|t = Int(|
|00000280| 51 75 65 72 79 50 6f 72 | 74 45 64 69 74 2e 47 65 |QueryPor|tEdit.Ge|
|00000290| 74 56 61 6c 75 65 28 29 | 29 3b 20 0d 0a 09 4c 2e |tValue()|); ...L.|
|000002a0| 62 4b 65 65 70 44 65 73 | 63 72 69 70 74 69 6f 6e |bKeepDes|cription|
|000002b0| 20 3d 20 21 55 70 64 61 | 74 65 44 65 73 63 72 69 | = !Upda|teDescri|
|000002c0| 70 74 69 6f 6e 43 68 65 | 63 6b 2e 62 43 68 65 63 |ptionChe|ck.bChec|
|000002d0| 6b 65 64 3b 0d 0a 09 4c | 2e 47 61 6d 65 50 6f 72 |ked;...L|.GamePor|
|000002e0| 74 20 3d 20 49 6e 74 28 | 47 61 6d 65 50 6f 72 74 |t = Int(|GamePort|
|000002f0| 45 64 69 74 2e 47 65 74 | 56 61 6c 75 65 28 29 29 |Edit.Get|Value())|
|00000300| 3b 0d 0a 0d 0a 09 4c 20 | 3d 20 57 2e 41 64 64 46 |;.....L |= W.AddF|
|00000310| 61 76 6f 72 69 74 65 28 | 4c 29 3b 0d 0a 0d 0a 09 |avorite(|L);.....|
|00000320| 69 66 28 4c 20 21 3d 20 | 4e 6f 6e 65 29 0d 0a 09 |if(L != |None)...|
|00000330| 09 4c 2e 50 69 6e 67 53 | 65 72 76 65 72 28 46 61 |.L.PingS|erver(Fa|
|00000340| 6c 73 65 2c 20 54 72 75 | 65 2c 20 54 72 75 65 29 |lse, Tru|e, True)|
|00000350| 3b 0d 0a 0d 0a 09 50 61 | 72 65 6e 74 57 69 6e 64 |;.....Pa|rentWind|
|00000360| 6f 77 2e 43 6c 6f 73 65 | 28 29 3b 0d 0a 7d 0d 0a |ow.Close|();..}..|
|00000370| 00                      |                         |.       |        |
+--------+-------------------------+-------------------------+--------+--------+